home *** CD-ROM | disk | FTP | other *** search
/ IRIX Base Documentation 2001 May / SGI IRIX Base Documentation 2001 May.iso / usr / share / catman / p_man / cat3 / f90 / pxfalarm.z / pxfalarm
Encoding:
Text File  |  1998-10-30  |  3.1 KB  |  72 lines
  1. PXFALARM(3F)                                           Last changed: 1-6-98
  2.  
  3.  
  4. NNAAMMEE
  5.      PPXXFFAALLAARRMM - Schedule alarm signal
  6.  
  7. SSYYNNOOPPSSIISS
  8.      SSUUBBRROOUUTTIINNEE PPXXFFAALLAARRMM((_i_s_e_c_o_n_d_s,, _i_s_e_c_l_e_f_t,, _i_e_r_r_o_r))
  9.      IINNTTEEGGEERR _i_s_e_c_o_n_d_s,, _i_s_e_c_l_e_f_t,, _i_e_r_r_o_r
  10.  
  11. IIMMPPLLEEMMEENNTTAATTIIOONN
  12.      UNICOS, UNICOS/mk, and IRIX systems
  13.  
  14. DDEESSCCRRIIPPTTIIOONN
  15.      The PPXXFFAALLAARRMM subroutine uses the aallaarrmm (2) system call to wait
  16.      _i_s_e_c_o_n_d_s before generating the SSIIGGAALLRRMM signal.  If a previous PPXXFFAALLAARRMM
  17.      has time remaining, _i_s_e_c_l_e_f_t contains the number of seconds until the
  18.      SSIIGGAALLRRMM would have been generated.
  19.  
  20.      The following is a list of arguments for this routine:
  21.  
  22.      _i_s_e_c_o_n_d_s  Default integer input variable containing the number of
  23.                real-time seconds to wait before sending the calling process
  24.                a SSIIGGAALLRRMM signal.
  25.  
  26.      _i_s_e_c_l_e_f_t  Default integer output variable containing the number of
  27.                seconds left until a previous request would have generated a
  28.                SSIIGGAALLRRMM signal.
  29.  
  30.      _i_e_r_r_o_r    Default integer output variable containing the status of
  31.                zero if PPXXFFAALLAARRMM was successful.
  32.  
  33.      On IRIX systems, this routine is in lliibbffoorrttrraann..ssoo which is linked by
  34.      default when compiling programs with the MIPSpro 7 Fortran 90 compiler
  35.      or when compiling programs with the --ccrraayylliibbss option to the MIPSpro
  36.      7.2 F77 compiler.
  37.  
  38.      When using the CF90 compiler or MIPSpro 7 Fortran 90 compiler on
  39.      UNICOS, UNICOS/mk, or IRIX systems, all arguments must be of default
  40.      kind unless documented otherwise.  On UNICOS and UNICOS/mk, default
  41.      kind is KKIINNDD==88 for integer, real, complex, and logical arguments; on
  42.      IRIX systems, the default kind is KKIINNDD==44.
  43.  
  44. NNOOTTEESS
  45.      Replace the subroutine or function reference to aallaarrmm(()) with a
  46.      subroutine call to PPXXFFAALLAARRMM.
  47.  
  48. EEXXAAMMPPLLEESS
  49.           program pxftest
  50.           integer iseconds, isecleft, ierror
  51.  
  52.           iseconds = 10
  53.           isecleft = 0
  54.           ierror = 0
  55.           CALL PXFALARM(iseconds, isecleft, ierror)
  56.           if (ierror .ne. 0) then
  57.              print *,'FAILED: PXFALARM call failed with error = ',ierror
  58.           else
  59.              print *,'PASSED: PXFALARM call returned no error'
  60.           endif
  61.           if (isecleft .ne. 0) then
  62.              print *,'FAILED: PXFALARM, isecleft not zero, =',isecleft
  63.           endif
  64.           end
  65.  
  66. SSEEEE AALLSSOO
  67.      aallaarrmm(2)
  68.  
  69.      _A_p_p_l_i_c_a_t_i_o_n _P_r_o_g_r_a_m_m_e_r'_s _L_i_b_r_a_r_y _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l, publication SR-
  70.      2165, for the printed version of this man page.
  71.  
  72.